Language/OS - Multiplatform Resource Library/LANGUAGE OS.iso/lisp/eulisp/comp0_89.lha/Feel/Boot/Compiler/instruct.i

Text File | 1993-07-16 | 15KB | 1 lines

((name instruct) (dependencies (arith list-fns errors numbers streams1 streams vector scan-args standard0 extras0 class-names telos1 boot init)) (exported-ids ((address instruct instruction-argtypes) (name . instruction-argtypes) (mutable ()) (class . unknown)) ((address instruct instruction-nargs) (name . instruction-nargs) (mutable ()) (class . unknown)) ((address instruct instruction-name) (name . instruction-name) (mutable ()) (class . unknown)) ((address instruct instruction-bytecode) (name . instruction-bytecode) (mutable ()) (class . unknown)) ((address instruct instruction-jumpp) (name . instruction-jumpp) (mutable ()) (class . unknown)) ((address instruct instruction-sidep) (name . instruction-sidep) (mutable ()) (class . unknown)) ((address instruct instruction-branchp) (name . instruction-branchp) (mutable ()) (class . unknown)) ((address instruct instruction-out-count) (name . instruction-out-count) (mutable ()) (class . unknown)) ((address instruct instruction-in-count) (name . instruction-in-count) (mutable ()) (class . unknown)) ((address instruct i-cost) (name . i-cost) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct mk-imaker) (name . mk-imaker) (mutable ()) (class . bytefunction) (argtype (() . 3))) ((address instruct i-arg-list) (name . i-arg-list) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-link-data) (name . i-link-data) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-arg-ref) (name . i-arg-ref) (mutable ()) (class . bytefunction) (argtype (() . 2))) ((address instruct i-name) (name . i-name) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-inumber) (name . i-inumber) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-nargs) (name . i-nargs) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-args) (name . i-args) (mutable ()) (class . unknown)) ((address instruct i-info) (name . i-info) (mutable ()) (class . unknown)) ((address instruct instruction-argwidth) (name . instruction-argwidth) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct is-null-op) (name . is-null-op) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct is-static-arg) (name . is-static-arg) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct is-link-arg) (name . is-link-arg) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct is-branch-arg) (name . is-branch-arg) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct is-label) (name . is-label) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct is-label-arg) (name . is-label-arg) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct instruction-label) (name . instruction-label) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct add-lab-ref) (name . add-lab-ref) (mutable ()) (class . bytefunction) (argtype (() . 2))) ((address instruct make-refed-label) (name . make-refed-label) (mutable ()) (class . bytefunction) (argtype (() . 0))) ((address instruct lab-refs) (name . lab-refs) (mutable ()) (class . unknown)) ((address instruct make-label) (name . make-label) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct find-instruction) (name . find-instruction) (mutable ()) (class . unknown)) ((address instruct inline-code-list) (name . inline-code-list) (mutable ()) (class . unknown)) ((address instruct inline-code) (name . inline-code) (mutable ()) (class . unknown)) ((address instruct inline-code-count) (name . inline-code-count) (mutable ()) (class . unknown)) ((address instruct make-inline-code) (name . make-inline-code) (mutable ()) (class . bytefunction) (argtype (() . 2))) ((address instruct is-inline-code) (name . is-inline-code) (mutable ()) (class . unknown)) ((address instruct nop-info) (name . nop-info) (mutable ()) (class . unknown)) ((address instruct nop) (name . nop) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct push-global-info) (name . push-global-info) (mutable ()) (class . unknown)) ((address instruct push-global) (name . push-global) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct push-special-info) (name . push-special-info) (mutable ()) (class . unknown)) ((address instruct push-special) (name . push-special) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct push-static-info) (name . push-static-info) (mutable ()) (class . unknown)) ((address instruct push-static) (name . push-static) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct push-small-fixnum-info) (name . push-small-fixnum-info) (mutable ()) (class . unknown)) ((address instruct push-small-fixnum) (name . push-small-fixnum) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct push-fixnum-info) (name . push-fixnum-info) (mutable ()) (class . unknown)) ((address instruct push-fixnum) (name . push-fixnum) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct set-global-info) (name . set-global-info) (mutable ()) (class . unknown)) ((address instruct set-global) (name . set-global) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct nth-ref-info) (name . nth-ref-info) (mutable ()) (class . unknown)) ((address instruct nth-ref) (name . nth-ref) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct nth-ref-0-info) (name . nth-ref-0-info) (mutable ()) (class . unknown)) ((address instruct nth-ref-0) (name . nth-ref-0) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct nth-ref-1-info) (name . nth-ref-1-info) (mutable ()) (class . unknown)) ((address instruct nth-ref-1) (name . nth-ref-1) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct nth-ref-2-info) (name . nth-ref-2-info) (mutable ()) (class . unknown)) ((address instruct nth-ref-2) (name . nth-ref-2) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct nth-ref-3-info) (name . nth-ref-3-info) (mutable ()) (class . unknown)) ((address instruct nth-ref-3) (name . nth-ref-3) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct set-nth-info) (name . set-nth-info) (mutable ()) (class . unknown)) ((address instruct set-nth) (name . set-nth) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-slide-stack-info) (name . i-slide-stack-info) (mutable ()) (class . unknown)) ((address instruct i-slide-stack) (name . i-slide-stack) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-slide-stack-1-info) (name . i-slide-stack-1-info) (mutable ()) (class . unknown)) ((address instruct i-slide-stack-1) (name . i-slide-stack-1) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct swap-info) (name . swap-info) (mutable ()) (class . unknown)) ((address instruct swap) (name . swap) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct drop-info) (name . drop-info) (mutable ()) (class . unknown)) ((address instruct drop) (name . drop) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct drop-1-info) (name . drop-1-info) (mutable ()) (class . unknown)) ((address instruct drop-1) (name . drop-1) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct env-ref-info) (name . env-ref-info) (mutable ()) (class . unknown)) ((address instruct env-ref) (name . env-ref) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct set-env-info) (name . set-env-info) (mutable ()) (class . unknown)) ((address instruct set-env) (name . set-env) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct make-env-info) (name . make-env-info) (mutable ()) (class . unknown)) ((address instruct make-env) (name . make-env) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct pop-env-info) (name . pop-env-info) (mutable ()) (class . unknown)) ((address instruct pop-env) (name . pop-env) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct vref-info) (name . vref-info) (mutable ()) (class . unknown)) ((address instruct vref) (name . vref) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct set-vref-info) (name . set-vref-info) (mutable ()) (class . unknown)) ((address instruct set-vref) (name . set-vref) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct slot-ref-info) (name . slot-ref-info) (mutable ()) (class . unknown)) ((address instruct slot-ref) (name . slot-ref) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct slot-ref-0-info) (name . slot-ref-0-info) (mutable ()) (class . unknown)) ((address instruct slot-ref-0) (name . slot-ref-0) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct slot-ref-1-info) (name . slot-ref-1-info) (mutable ()) (class . unknown)) ((address instruct slot-ref-1) (name . slot-ref-1) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct set-slot-info) (name . set-slot-info) (mutable ()) (class . unknown)) ((address instruct set-slot) (name . set-slot) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct set-slot-1-info) (name . set-slot-1-info) (mutable ()) (class . unknown)) ((address instruct set-slot-1) (name . set-slot-1) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-set-type-info) (name . i-set-type-info) (mutable ()) (class . unknown)) ((address instruct i-set-type) (name . i-set-type) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct branch-info) (name . branch-info) (mutable ()) (class . unknown)) ((address instruct branch) (name . branch) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct branch-nil-info) (name . branch-nil-info) (mutable ()) (class . unknown)) ((address instruct branch-nil) (name . branch-nil) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct apply-args-info) (name . apply-args-info) (mutable ()) (class . unknown)) ((address instruct apply-args) (name . apply-args) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct apply-any-info) (name . apply-any-info) (mutable ()) (class . unknown)) ((address instruct apply-any) (name . apply-any) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct apply-bvf-info) (name . apply-bvf-info) (mutable ()) (class . unknown)) ((address instruct apply-bvf) (name . apply-bvf) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct apply-cfn-info) (name . apply-cfn-info) (mutable ()) (class . unknown)) ((address instruct apply-cfn) (name . apply-cfn) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct apply-method-list-info) (name . apply-method-list-info) (mutable ()) (class . unknown)) ((address instruct apply-method-list) (name . apply-method-list) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct apply-methods-info) (name . apply-methods-info) (mutable ()) (class . unknown)) ((address instruct apply-methods) (name . apply-methods) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct push-label-info) (name . push-label-info) (mutable ()) (class . unknown)) ((address instruct push-label) (name . push-label) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct return-info) (name . return-info) (mutable ()) (class . unknown)) ((address instruct return) (name . return) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-exit-info) (name . i-exit-info) (mutable ()) (class . unknown)) ((address instruct i-exit) (name . i-exit) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-cons-info) (name . i-cons-info) (mutable ()) (class . unknown)) ((address instruct i-cons) (name . i-cons) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct alloc-closure-info) (name . alloc-closure-info) (mutable ()) (class . unknown)) ((address instruct alloc-closure) (name . alloc-closure) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct alloc-extended-closure-info) (name . alloc-extended-closure-info) (mutable ()) (class . unknown)) ((address instruct alloc-extended-closure) (name . alloc-extended-closure) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct alloc-thing-info) (name . alloc-thing-info) (mutable ()) (class . unknown)) ((address instruct alloc-thing) (name . alloc-thing) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct nullp-info) (name . nullp-info) (mutable ()) (class . unknown)) ((address instruct nullp) (name . nullp) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct eqp-info) (name . eqp-info) (mutable ()) (class . unknown)) ((address instruct eqp) (name . eqp) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-consp-info) (name . i-consp-info) (mutable ()) (class . unknown)) ((address instruct i-consp) (name . i-consp) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-assq-info) (name . i-assq-info) (mutable ()) (class . unknown)) ((address instruct i-assq) (name . i-assq) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-memq-info) (name . i-memq-info) (mutable ()) (class . unknown)) ((address instruct i-memq) (name . i-memq) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-scanq-info) (name . i-scanq-info) (mutable ()) (class . unknown)) ((address instruct i-scanq) (name . i-scanq) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct current-context-info) (name . current-context-info) (mutable ()) (class . unknown)) ((address instruct current-context) (name . current-context) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct ensure-stack-info) (name . ensure-stack-info) (mutable ()) (class . unknown)) ((address instruct ensure-stack) (name . ensure-stack) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct i-label-info) (name . i-label-info) (mutable ()) (class . unknown)) ((address instruct i-label) (name . i-label) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct dead-code-info) (name . dead-code-info) (mutable ()) (class . unknown)) ((address instruct dead-code) (name . dead-code) (mutable ()) (class . bytefunction) (argtype (() . 1))) ((address instruct bc-macro-type) (name . bc-macro-type) (mutable ()) (class . unknown))))